home *** CD-ROM | disk | FTP | other *** search
/ PCNet 1998 June / PCnet Haziran 1998.iso / Internet / Chat / oxscript.exe / System / alias2.ini < prev    next >
Encoding:
INI File  |  1998-01-27  |  3.6 KB  |  89 lines
  1. [aliases]
  2. n0=/takover {
  3. n1=  /taktopic
  4. n2=  echo 2 -a Takeover du channel: 6ActivΘ %ver
  5. n3=  /set %auto $chan
  6. n4=  /set -q %i 0
  7. n5=  /set -q %nicks
  8. n6=  /set -q %nc 0
  9. n7=  :begin
  10. n8=  /inc -q %i
  11. n9=  %nick = $opnick(%i,#)
  12. n10=  if (%nick == $null) goto null
  13. n11=  if (%nick != $me) goto yes
  14. n12=  goto begin
  15. n13=  :yes
  16. n14=  /set %nicks %nicks %nick
  17. n15=  /inc -q %nc
  18. n16=  if (%nc == 4) goto four
  19. n17=  goto begin
  20. n18=  :four
  21. n19=  /raw -q mode # -oooooo %nicks
  22. n20=  /set -q %nc 0
  23. n21=  /set -q %nicks
  24. n22=  goto begin
  25. n23=  :null
  26. n24=  /raw -q mode # -oooooo %nicks
  27. n25=  /set -q %nc 0
  28. n26=  /set -q %nicks
  29. n27=  set %k 0
  30. n28=  :start
  31. n29=  %k = %k + 1
  32. n30=  if ($nick(%k,#) = $me) { goto start }
  33. n31=  if ($nick(%k,#) = $null) { halt } 
  34. n32=  raw -q kick # $nick(%k,#) :
  35. n33=  goto start
  36. n34=}  
  37. n35=/taktopic /mode # +itnsk Ox|script | /topic # Taking by %ver | unset %auto
  38. n36=/givback /mode # -isk Ox|script | /topic # Given back by %ver 
  39. n37=/error /run $mircdirmsgbox.exe _->--Erreur!--<-_- $1- 10
  40. n38=/desynch1 {
  41. n39=  if ($me !isop #) { /error Il_faut_Ωtre_op_pour_faire_un_Desynch! | halt }
  42. n40=  else { /raw -q mode # +bbbbbb 16,16 $+ *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* | /raw -q mode # +bbbbbb 16,16 $+ *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* | /raw -q mode # +bbbbbb 16,16 $+ *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* | /raw -q mode # +bbbbbb 16,16 $+ *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* }
  43. n41=}
  44. n42=/desynch2 {
  45. n43=  if ($me !isop #) { /error Il_faut_Ωtre_op_pour_faire_un_Desynch! | halt }
  46. n44=  else { /raw -q mode # -bbbbbb 16,16 $+ *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* | /raw -q mode # +bbbbbb 16,16 $+ *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* | /raw -q mode # +bbbbbb 16,16 $+ *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* | /raw -q mode # +bbbbbb 16,16 $+ *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* }
  47. n45=}
  48. n46=/md {
  49. n47=  set %Var.Chan $chan
  50. n48=  set %i 1
  51. n49=  set %Var.Index 1
  52. n50=  if (s isin $1) { set %Var.Safe $$2 }
  53. n51=  if (t isin $1) { set %Var.Take y }
  54. n52=  if (undernet isin $server) { set %Var.Num 6 }
  55. n53=  else { set %Var.Num 4 }
  56. n54=  :start
  57. n55=  set %Var.User $opnick(%i,%Var.Chan)
  58. n56=  if (%Var.User == $null) { 
  59. n57=    raw -q mode %Var.Chan -oooooo %Var.Nick 
  60. n58=    if (%Var.Take == y) { /mode # +smpti | /topic %Var.Chan %ver ╗ Take0ver ½ %ver ╗ } 
  61. n59=    if (s isin $1) { raw -q mode # +o %Var.Safe }
  62. n60=    echo -a $vers 4Mass Deop On $chan
  63. n61=    unset %Var.Nick | unset %i | unset %Var.Chan | unset %Var.Index | unset %Var.Num | unset %Var.Safe | unset %Var.Take | halt 
  64. n62=  }
  65. n63=  if (%Var.User == $me) || (%Var.User == %Var.Safe) { inc %i 1 | goto start }
  66. n64=  if (%Var.User != $me) { set %Var.Nick %Var.User %Var.Nick | if (%Var.Index == %Var.Num) { raw -q mode %Var.Chan -oooooo %Var.Nick | unset %Var.Nick | set %Var.Index 1 | inc %i 1 | goto start } | inc %Var.Index 1 }  
  67. n65=  inc %i 1 
  68. n66=  goto start
  69. n67=}  
  70. n68=/mk {
  71. n69=  set %i 1
  72. n70=  set %Var.Int 1
  73. n71=  :start
  74. n72=  set %Var.Nick $nick(%i,#)
  75. n73=  if (%Var.Nick == $null) { echo -a $vers 4Mass Kick On # | unset %i | unset %Var.Nick | unset %Var.int | halt }
  76. n74=  if (%Var.Nick != $me) { kick # %Var.Nick Mass Kick %ver Wh0re Number: %Var.Int | inc %Var.int 1 }
  77. n75=  inc %i 1  
  78. n76=  goto start  
  79. n77=}
  80. n78=/mb {
  81. n79=  set %i 1
  82. n80=  :start
  83. n81=  set %Var.Nick $nick(%i,#)
  84. n82=  if (%Var.Nick == $null) { echo -a $vers 4Mass Ban On # | unset %i | unset %Var.Nick | halt }
  85. n83=  if (%Var.Nick != $me) { ban # %Var.Nick 3 }
  86. n84=  inc %i 1  
  87. n85=  goto start  
  88. n86=}
  89.